<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "https://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=11"/>
<meta name="generator" content="Doxygen 1.12.0"/>
<meta name="viewport" content="width=device-width, initial-scale=1"/>
<title>Dataset-JSON v1.1 Hands-On Implementation Training: macros/cstutilnobs.sas Source File</title>
<link href="../../tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="../../jquery.js"></script>
<script type="text/javascript" src="../../dynsections.js"></script>
<script type="text/javascript" src="../../clipboard.js"></script>
<link href="../../navtree.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="../../navtreedata.js"></script>
<script type="text/javascript" src="../../navtree.js"></script>
<script type="text/javascript" src="../../resize.js"></script>
<script type="text/javascript" src="../../cookie.js"></script>
<link href="../../search/search.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="../../search/searchdata.js"></script>
<script type="text/javascript" src="../../search/search.js"></script>
<link href="../../doxygen.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
 <tbody>
 <tr id="projectrow">
  <td id="projectalign">
   <div id="projectname">Dataset-JSON v1.1 Hands-On Implementation Training
   </div>
   <div id="projectbrief">Dataset-JSON v1.1 Hands-On Implementation Training</div>
  </td>
 </tr>
 </tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.12.0 -->
<script type="text/javascript">
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&amp;dn=expat.txt MIT */
var searchBox = new SearchBox("searchBox", "../../search/",'.html');
/* @license-end */
</script>
<script type="text/javascript">
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&amp;dn=expat.txt MIT */
$(function() { codefold.init(1); });
/* @license-end */
</script>
<script type="text/javascript" src="../../menudata.js"></script>
<script type="text/javascript" src="../../menu.js"></script>
<script type="text/javascript">
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&amp;dn=expat.txt MIT */
$(function() {
  initMenu('../../',true,false,'search.php','Search',true);
  $(function() { init_search(); });
});
/* @license-end */
</script>
<div id="main-nav"></div>
</div><!-- top -->
<div id="side-nav" class="ui-resizable side-nav-resizable">
  <div id="nav-tree">
    <div id="nav-tree-contents">
      <div id="nav-sync" class="sync"></div>
    </div>
  </div>
  <div id="splitbar" style="-moz-user-select:none;" 
       class="ui-resizable-handle">
  </div>
</div>
<script type="text/javascript">
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&amp;dn=expat.txt MIT */
$(function(){initNavTree('da/d00/cstutilnobs_8sas_source.html','../../'); initResizable(true); });
/* @license-end */
</script>
<div id="doc-content">
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
     onmouseover="return searchBox.OnSearchSelectShow()"
     onmouseout="return searchBox.OnSearchSelectHide()"
     onkeydown="return searchBox.OnSearchSelectKey(event)">
</div>

<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<div id="MSearchResults">
<div class="SRPage">
<div id="SRIndex">
<div id="SRResults"></div>
<div class="SRStatus" id="Loading">Loading...</div>
<div class="SRStatus" id="Searching">Searching...</div>
<div class="SRStatus" id="NoMatches">No Matches</div>
</div>
</div>
</div>
</div>

<div class="header">
  <div class="headertitle"><div class="title">cstutilnobs.sas</div></div>
</div><!--header-->
<div class="contents">
<div class="fragment"><div class="line"><a id="l00001" name="l00001"></a><span class="lineno">    1</span>%* Copyright (c) 2022, SAS Institute Inc., Cary, NC, USA.  All Rights Reserved.   *;</div>
<div class="line"><a id="l00002" name="l00002"></a><span class="lineno">    2</span>%* SPDX-License-Identifier: Apache-2.0                                            *;</div>
<div class="line"><a id="l00003" name="l00003"></a><span class="lineno">    3</span>%*                                                                                *;</div>
<div class="line"><a id="l00004" name="l00004"></a><span class="lineno">    4</span>%* cstutilnobs                                                                    *;</div>
<div class="line"><a id="l00005" name="l00005"></a><span class="lineno">    5</span>%*                                                                                *;</div>
<div class="line"><a id="l00006" name="l00006"></a><span class="lineno">    6</span>%* Returns the number of observations in a data <span class="keyword">set</span> or an error.                  *;</div>
<div class="line"><a id="l00007" name="l00007"></a><span class="lineno">    7</span>%*                                                                                *;</div>
<div class="line"><a id="l00008" name="l00008"></a><span class="lineno">    8</span>%* If the data <span class="keyword">set</span> does not exist or cannot be opened, an error occurs.           *;</div>
<div class="line"><a id="l00009" name="l00009"></a><span class="lineno">    9</span>%*                                                                                *;</div>
<div class="line"><a id="l00010" name="l00010"></a><span class="lineno">   10</span>%* These actions occur:                                                           *;</div>
<div class="line"><a id="l00011" name="l00011"></a><span class="lineno">   11</span>%* 1. The macro attempts to open the data <span class="keyword">set</span>.                                    *;</div>
<div class="line"><a id="l00012" name="l00012"></a><span class="lineno">   12</span>%*    If the data <span class="keyword">set</span> cannot be opened, an error message is returned and          *;</div>
<div class="line"><a id="l00013" name="l00013"></a><span class="lineno">   13</span>%*    processing stops.                                                           *;</div>
<div class="line"><a id="l00014" name="l00014"></a><span class="lineno">   14</span>%* 2. The macro checks the values of the data <span class="keyword">set</span> attributes ANOBS (Does SAS know *;</div>
<div class="line"><a id="l00015" name="l00015"></a><span class="lineno">   15</span>%*    how many observations there are?) and WHSTMT (Is a WHERE statement in       *;</div>
<div class="line"><a id="l00016" name="l00016"></a><span class="lineno">   16</span>%*    effect?).                                                                   *;</div>
<div class="line"><a id="l00017" name="l00017"></a><span class="lineno">   17</span>%* 3. If SAS knows the number of observations and there is no WHERE clause, the   *;</div>
<div class="line"><a id="l00018" name="l00018"></a><span class="lineno">   18</span>%*    value of the data <span class="keyword">set</span> attribute NLOBS (number of logical observations) is   *;</div>
<div class="line"><a id="l00019" name="l00019"></a><span class="lineno">   19</span>%*    returned.                                                                   *;</div>
<div class="line"><a id="l00020" name="l00020"></a><span class="lineno">   20</span>%* 4. If SAS does not know the number of observations (perhaps <span class="keyword">this</span> is a view or  *;</div>
<div class="line"><a id="l00021" name="l00021"></a><span class="lineno">   21</span>%*    transport data <span class="keyword">set</span>) or <span class="keywordflow">if</span> a WHERE clause is in effect, a forced read is done*;</div>
<div class="line"><a id="l00022" name="l00022"></a><span class="lineno">   22</span>%*    of the data <span class="keyword">set</span> <span class="keyword">using </span>NLOBSF. (NOTE: that <span class="keyword">this</span> can be slow <span class="keywordflow">for</span> large data   *;</div>
<div class="line"><a id="l00023" name="l00023"></a><span class="lineno">   23</span>%*    sets.)                                                                      *;</div>
<div class="line"><a id="l00024" name="l00024"></a><span class="lineno">   24</span>%*    If the data <span class="keyword">set</span> exists, the value returned is a whole number. If the data   *;</div>
<div class="line"><a id="l00025" name="l00025"></a><span class="lineno">   25</span>%*    <span class="keyword">set</span> cannot be opened, a period (the <span class="keywordflow">default</span> missing value) is returned.     *;</div>
<div class="line"><a id="l00026" name="l00026"></a><span class="lineno">   26</span>%*                                                                                *;</div>
<div class="line"><a id="l00027" name="l00027"></a><span class="lineno">   27</span>%*   Examples:                                                                    *;</div>
<div class="line"><a id="l00028" name="l00028"></a><span class="lineno">   28</span>%*     %put %cstutilnobs(_cstDataSetName=sashelp.class)                           *;</div>
<div class="line"><a id="l00029" name="l00029"></a><span class="lineno">   29</span>%*     %put %cstutilnobs(_cstDataSetName=sashelp.class(where=(sex=<span class="stringliteral">&quot;M&quot;</span>)))          *;</div>
<div class="line"><a id="l00030" name="l00030"></a><span class="lineno">   30</span>%*     %put %cstutilnobs(_cstDataSetName=sashelp.vtable)                          *;</div>
<div class="line"><a id="l00031" name="l00031"></a><span class="lineno">   31</span>%*     title <span class="stringliteral">&quot;sashelp.class has %cstutilnobs(_cstDataSetName=sashelp.class) obs&quot;</span>  *;</div>
<div class="line"><a id="l00032" name="l00032"></a><span class="lineno">   32</span>%*                                                                                *;</div>
<div class="line"><a id="l00033" name="l00033"></a><span class="lineno">   33</span>%* @param _cstDataSetName - required - The (libname.)memname of the data set.     *;</div>
<div class="line"><a id="l00034" name="l00034"></a><span class="lineno">   34</span>%*            Default: _last_                                                     *;</div>
<div class="line"><a id="l00035" name="l00035"></a><span class="lineno">   35</span>%*                                                                                *;</div>
<div class="line"><a id="l00036" name="l00036"></a><span class="lineno">   36</span>%* @since 1.5                                                                     *;</div>
<div class="line"><a id="l00037" name="l00037"></a><span class="lineno">   37</span>%* @exposure internal                                                             *;</div>
<div class="line"><a id="l00038" name="l00038"></a><span class="lineno">   38</span> </div>
<div class="line"><a id="l00039" name="l00039"></a><span class="lineno">   39</span>%macro cstutilnobs(_cstDataSetName=_last_)</div>
<div class="line"><a id="l00040" name="l00040"></a><span class="lineno">   40</span>    / des=&#39;CST: Returns the number of observations in a data set&#39;;</div>
<div class="line"><a id="l00041" name="l00041"></a><span class="lineno">   41</span> </div>
<div class="line"><a id="l00042" name="l00042"></a><span class="lineno">   42</span>  %* Declare local variables used in the macro  *;</div>
<div class="line"><a id="l00043" name="l00043"></a><span class="lineno">   43</span>  %local _cstdsid _cstnobs _cstrc;</div>
<div class="line"><a id="l00044" name="l00044"></a><span class="lineno">   44</span> </div>
<div class="line"><a id="l00045" name="l00045"></a><span class="lineno">   45</span>  %let _cstdsid = %sysfunc(open(&amp;_cstDataSetName, I));</div>
<div class="line"><a id="l00046" name="l00046"></a><span class="lineno">   46</span>   %* Failed to open the data set *;</div>
<div class="line"><a id="l00047" name="l00047"></a><span class="lineno">   47</span>   %if &amp;_cstdsid = 0</div>
<div class="line"><a id="l00048" name="l00048"></a><span class="lineno">   48</span>    %then %do;</div>
<div class="line"><a id="l00049" name="l00049"></a><span class="lineno">   49</span>      %put %sysfunc(sysmsg());</div>
<div class="line"><a id="l00050" name="l00050"></a><span class="lineno">   50</span>      %let _cstnobs = .;</div>
<div class="line"><a id="l00051" name="l00051"></a><span class="lineno">   51</span>      %goto exit_abort;</div>
<div class="line"><a id="l00052" name="l00052"></a><span class="lineno">   52</span>    %end;</div>
<div class="line"><a id="l00053" name="l00053"></a><span class="lineno">   53</span>    %else %do;</div>
<div class="line"><a id="l00054" name="l00054"></a><span class="lineno">   54</span>      %* Check to see if the engine is aware of <span class="preprocessor"># obs *;</span></div>
<div class="line"><a id="l00055" name="l00055"></a><span class="lineno">   55</span>      %* and <span class="keywordflow">if</span> there is an active where clause       *;</div>
<div class="line"><a id="l00056" name="l00056"></a><span class="lineno">   56</span>      %<span class="keywordflow">if</span> %sysfunc(attrn(&amp;_cstdsid, ANOBS)) = 1 and</div>
<div class="line"><a id="l00057" name="l00057"></a><span class="lineno">   57</span>          %sysfunc(attrn(&amp;_cstdsid, WHSTMT)) = 0</div>
<div class="line"><a id="l00058" name="l00058"></a><span class="lineno">   58</span>        %then %let _cstnobs = %sysfunc(attrn(&amp;_cstdsid, NLOBS));</div>
<div class="line"><a id="l00059" name="l00059"></a><span class="lineno">   59</span>        %<span class="keywordflow">else</span> %let _cstnobs = %sysfunc(attrn(&amp;_cstdsid,NLOBSF));</div>
<div class="line"><a id="l00060" name="l00060"></a><span class="lineno">   60</span>      %let _cstrc = %sysfunc(close(&amp;_cstdsid));</div>
<div class="line"><a id="l00061" name="l00061"></a><span class="lineno">   61</span>    %end;</div>
<div class="line"><a id="l00062" name="l00062"></a><span class="lineno">   62</span>  %exit_abort:</div>
<div class="line"><a id="l00063" name="l00063"></a><span class="lineno">   63</span>  %*;&amp;_cstnobs%*;</div>
<div class="line"><a id="l00064" name="l00064"></a><span class="lineno">   64</span> </div>
<div class="line"><a id="l00065" name="l00065"></a><span class="lineno">   65</span>%mend cstutilnobs;</div>
</div><!-- fragment --></div><!-- contents -->
</div><!-- doc-content -->
<!-- start footer part -->
<div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
  <ul>
    <li class="navelem"><a class="el" href="../../dir_c8843521cc2b354892efaf471a0b361e.html">macros</a></li><li class="navelem"><b>cstutilnobs.sas</b></li>
    <li class="footer">Generated by <a href="https://www.doxygen.org/index.html"><img class="footer" src="../../doxygen.svg" width="104" height="31" alt="doxygen"/></a> 1.12.0 </li>
  </ul>
</div>
</body>
</html>
